home *** CD-ROM | disk | FTP | other *** search
/ Info-Mac 4 / Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso / Development / General / Script Tools / Examples / Choose Several Folders Example < prev    next >
Text File  |  1993-06-17  |  395b  |  17 lines
  1. property folderList : {}
  2.  
  3. set folderOK to true
  4. try
  5.     set folderList to ¬
  6.         choose several folders with prompt "Please select folders to be archived:" ¬
  7.             starting with folderList
  8. on error errText number errNum
  9.     display dialog "Choose several files canceled (error: " & errText & ")" ¬
  10.         buttons {"OK"} ¬
  11.         default button {"OK"}
  12.     set folderOK to false
  13. end try
  14.  
  15. if folderOK then
  16.     folderList
  17. end if